home *** CD-ROM | disk | FTP | other *** search
/ JCSM Shareware Collection 1993 November / JCSM Shareware Collection - 1993-11.iso / cl880 / iris128j.lzh / ORDER.BAT < prev    next >
DOS Batch File  |  1990-01-10  |  759b  |  39 lines
  1. ECHO OFF
  2. CLS
  3. ECHO Working ..
  4. BREAK ON
  5. REM Order.Bat  Copyright (c) 1989 Ted Husted  Do not alter!
  6. GOTO ASK
  7.  
  8. :LOGON
  9.  ECHO Required files are not available.
  10.  ECHO Please log onto the distribution disk and try again.
  11.  GOTO END
  12.  
  13. :SORRY
  14.  ECHO Please try to run "%0" again sometime.
  15.  GOTO END
  16.  
  17. :OFFLINE
  18.  ECHO Your printer doesn't seem ready.
  19.  GETKEY Would you like to continue anyway? N
  20.  IF NOT ERRORLEVEL 1 GOTO SORRY
  21.  GOTO GO
  22.  
  23. :ASK
  24.  GETKEY Are you ready to print your order form now? Y
  25.  IF ERRORLEVEL 1 GOTO SORRY
  26.  
  27. :INVENTORY
  28.  FOR %%f IN (CHKPRN.EXE GETKEY.EXE ORDER ORDER.FTR ORDER.HDR) DO IF NOT EXIST %%f GOTO LOGON
  29.  
  30. :CHECK
  31.  CHKPRN
  32.  IF ERRORLEVEL 3 GOTO OFFLINE
  33.  
  34. :GO
  35.  COPY ORDER.HDR+ORDER+ORDER.FTR PRN:
  36.  DEL ORDER.
  37.  
  38. :END
  39.